Asia X/Asia X.iso/mac/ASIAWIN/SHARED.DIR/00153_Script_153

Text File | 1995-08-23 | 5KB | 237 lines

on exitFrame
  global g_doll_state
  global g_help_state
  global g_option_state
  global g_quit_state
  global g_auto_state

  global doll_auto
  global doll_right
  global doll_left
  global doll_help
  global doll_option
  global doll_quit

--  if the stageColor=255 then
--    set the stageColor to 0
--  end if

  set newstate to the mouseCast

  if newstate=doll_right then
    if g_doll_state=5 then
      center_to_right
    end if
    if g_doll_state=1 then
      left_to_center
      center_to_right
    end if
    set g_doll_state to 9
  end if

  if newstate=doll_left then
    if g_doll_state=5 then
      center_to_left
    end if
    if g_doll_state=9 then
      right_to_center
      center_to_left
    end if
    set g_doll_state to 1
  end if

  if not (newstate=doll_right or newstate=doll_left) then
    --newstate equals other
    if g_doll_state=9 then
      right_to_center
    end if
    if g_doll_state=1 then
      left_to_center
    end if
    set g_doll_state to 5
  end if

  if newstate=doll_help and g_help_state=4 then
    help_open
    set g_help_state to 1
  end if

  if newstate<>doll_help and g_help_state=1 then
    help_close
    set g_help_state to 4
  end if

  if newstate=doll_option and g_option_state=4 then
    option_open
    set g_option_state to 1
  end if

  if newstate<>doll_option and g_option_state=1 then
    option_close
    set g_option_state to 4
  end if

  if newstate=doll_auto and g_auto_state=4 then
    auto_open
    set g_auto_state to 1
  end if

  if newstate<>doll_auto and g_auto_state=1 then
    auto_close
    set g_auto_state to 4
  end if

  if newstate=doll_quit and g_quit_state=4 then
    quit_open
    set g_quit_state to 1
  end if

  if newstate<>doll_quit and g_quit_state=1 then
    quit_close
    set g_quit_state to 4
  end if

  go to the frame

end

on help_open
  global Help3,Help2,Help1


  set the castnum of sprite 9 to Help3
  updateStage
  set the castnum of sprite 9 to Help2
  updateStage
  set the castnum of sprite 9 to Help1
  updateStage
end

on help_close
  global Help4,Help3,Help2

  set the castnum of sprite 9 to Help2
  updateStage
  set the castnum of sprite 9 to Help3
  updateStage
  set the castnum of sprite 9 to Help4
  updateStage
end

on auto_close
  global auto3,auto2,auto1


  set the castnum of sprite 7 to auto3
  updateStage
  set the castnum of sprite 7 to auto2
  updateStage
  set the castnum of sprite 7 to auto1
  updateStage
end

on auto_open
  global auto4,auto3,auto2

  set the castnum of sprite 7 to auto2
  updateStage
  set the castnum of sprite 7 to auto3
  updateStage
  set the castnum of sprite 7 to auto4
  updateStage
end

on quit_close
  global Quit3,Quit2,Quit1

  set the castnum of sprite 10 to Quit3
  updateStage
  set the castnum of sprite 10 to Quit2
  updateStage
  set the castnum of sprite 10 to Quit1
  updateStage
end

on quit_open
  global Quit4,Quit3,Quit2

  set the castnum of sprite 10 to Quit2
  updateStage
  set the castnum of sprite 10 to Quit3
  updateStage
  set the castnum of sprite 10 to Quit4
  updateStage
end

on option_close
  global Option3,Option2,Option1
  set the castnum of sprite 11 to Option3
  updateStage
  set the castnum of sprite 11 to Option2
  updateStage
  set the castnum of sprite 11 to Option1
  updateStage
end

on option_open
  global Option4,Option3,Option2

  set the castnum of sprite 11 to Option2
  updateStage
  set the castnum of sprite 11 to Option3
  updateStage
  set the castnum of sprite 11 to Option4
  updateStage
end

on center_to_left
  global Doll4,Doll3,Doll2,Doll1

  set the castnum of sprite 8 to Doll4
  updateStage
  set the castnum of sprite 8 to Doll3
  updateStage
  set the castnum of sprite 8 to Doll2
  updateStage
  set the castnum of sprite 8 to Doll1
  updateStage
end center_to_left

on center_to_right
  global Doll9,Doll8,Doll7,Doll6

  set the castnum of sprite 8 to Doll6
  updateStage
  set the castnum of sprite 8 to Doll7
  updateStage
  set the castnum of sprite 8 to Doll8
  updateStage
  set the castnum of sprite 8 to Doll9
  updateStage
end center_to_right

on right_to_center
  global Doll8,Doll7,Doll6,Doll5

  set the castnum of sprite 8 to Doll8
  updateStage
  set the castnum of sprite 8 to Doll7
  updateStage
  set the castnum of sprite 8 to Doll6
  updateStage
  set the castnum of sprite 8 to Doll5
  updateStage
end right_to_center

on left_to_center
  global Doll5,Doll4,Doll3,Doll2

  set the castnum of sprite 8 to Doll2
  updateStage
  set the castnum of sprite 8 to Doll3
  updateStage
  set the castnum of sprite 8 to Doll4
  updateStage
  set the castnum of sprite 8 to Doll5
  updateStage
end left_to_center